home *** CD-ROM | disk | FTP | other *** search
Wrap
; $VER: ClassAction V3.6 Installer ; Script to install Release 3.6 of ClassAction (complete 0) (set #Abort (cat "NON" )) (set #Overwrite (cat "OUI" )) (set #conf (cat "\n\nVoulez vous installer les fichiers de \nconfig standards" " sur votre systeme ?\nSi ceci est votre premiere installation\n" "je vous recommande de les installer." )) (set #conf-help (cat "\n\nl'installeur a besoin de savoir si vous voulez\n" "installer les fichiers standards de config.\n\n" "Si vous avez deja votre propre configuration instalée\n" "cliquez sur NON\n" "pour conserver votre ancienne configuration." )) ;******************************************************************** (set #warn-kickstart-text (cat " ClassAction 3.6 est MailWare\n\n" " Vous pouvez vous enregister GRATUITEMENT sur le Web\n" " Cette version utilise les catalogues de la 3.5\n" " a ce titre les catalogues disponibles sur le Net\n" " pour la 3.5 sont valides pour cette version\n" " Essayez les touches +,-,*,/ et Enter du pave numerique\n" " ET N'OUBLIEZ PAS DE LIRE LA DOC POUR LES NOUVEAUX TOOLTYPES" "\n ClassAction 3.6 necessite MUI 3.0 ou superieur\n\n" )) ;********************************************************************* (set #CAS-query-text (cat "Ou dois je installer\nCAStart ?" )) (set #CAS-query-help (cat "\n\nVous devez choisir un repertoire ou installer CAStart\n" "\n\n" "Choisissez le repertoire voulu puis cliquez sur continuer" "\n\nCAStart est un petit executable que vous pouvez mettre" "\ncomme projet a vos icones" )) ;********************************************************************* (set #DOC-query-text (cat "Ou dois je installer\nla documentation ?" )) (set #DOC-query-help (cat "\n\nVous devez choisir un repertoire ou installer\n" "la documentation ( fichier amigaguide )\n\n" "Choisissez le repertoire voulu puis cliquez sur continuer" )) ;**************************************** (set #CA-query-text (cat "Ou dois je installer\nle programme principal\nClassAction ?" )) (set #CA-query-help (cat "\n\nVous devez choisir un repertoire ou installer\n" "ClassAction ( le programme principal )\n\n" "Choisissez le repertoire voulu puis cliquez sur continuer" )) ;**************************************** (set #CAP-query-text (cat "Ou dois je installer \nClassActionPrefs ?" )) (set #CAP-query-help (cat "\n\nVous devez choisir un repertoire ou installer\n" "ClassActionPrefs ( le programme de configuration )\n\n" "Choisissez le repertoire voulu puis cliquez sur continuer\n" "vous pouvez choisir SYS:Prefs si vous ne savez pas\n" "ou l'installer. " )) (set #ver-help (cat "\n\nSi vous faite une mise a jour\n" "de ClassAction, son icone\n\n" "ne sera pas copié, pour eviter\n" "d'alterer votre config tooltypes\n" )) ;******************************************************************** (set #goodbye (cat "\nClassAction est maintenant installé." )) ;******************************************************************** (set ver (/ (getversion) 65536) ) (set warning (#warn-kickstart-text ver) ) (message warning) (set cpu (askchoice (prompt "Quelle version de processeur voulez vous installer ?") (choices "68000" "68020 ou superieur") (help "Choisissez votre processeur"))) (if (= 0 cpu) ( (rename "ClassAction.00" "ClassAction") (rename "ClassActionPrefs.00" "ClassActionPrefs") )) (if (= 1 cpu) ( (rename "ClassAction.20" "ClassAction") (rename "ClassActionPrefs.20" "ClassActionPrefs") )) (set thedir (askdir (prompt #CA-query-text) (help #CA-query-help) (default "SYS:WbStartup"))) (makeassign "CAHOME" thedir) (if(exists("CAHOME:ClassAction")) ( (message "\nVous etes en train de faire une mise a jour de ClassAction\n\nN'oubliez pas de lire le guide \na propos des nouveaux tooltypes definis\net des nouvelles capacites de la version 3.6.") (copyfiles (source "ClassAction") (dest thedir)) (run "utt CAHOME:ClassAction ClassAction CAHOME:ClassAction") ) (copyfiles (source "ClassAction") (dest thedir) (infos)) ) (complete 25) (set thedir (askdir (prompt #CAP-query-text) (help #CAP-query-help) (default "SYS:Prefs"))) (copyfiles (source "ClassActionPrefs") (dest thedir) (infos) ) (complete 50) (set thedir (askdir (prompt #DOC-query-text) (help #DOC-query-help) (default "HELP:"))) (copyfiles (source "Francais/ClassAction.guide") (dest thedir) (infos) ) (complete 75) (set thedir (askdir (prompt #CAS-query-text) (help #CAS-query-help) (default "C:"))) (copyfiles (source "CAStart") (dest thedir) (infos) ) (complete 85) (makedir ("ENVARC:ClassAction")) (if(exists("ENVARC:ClassAction.prefs")) ( (copyfiles (source "ENVARC:ClassAction.prefs") (dest "ENVARC:ClassAction")) (delete ("ENVARC:ClassAction.prefs")) )) (if(exists("ENVARC:ClassAction_Gen.prefs")) ( (copyfiles (source "ENVARC:ClassAction_Gen.prefs") (dest "ENVARC:ClassAction")) (delete ("ENVARC:ClassAction_Gen.prefs")) )) (if(askbool (prompt #conf) (help #conf-help) ) ( (copyfiles (source "English/ClassAction.prefs") (dest "ENVARC:ClassAction")) (copyfiles (source "English/ClassAction_Gen.prefs") (dest "ENVARC:ClassAction")) (copyfiles (source "English/ClassAction_Dir.prefs") (dest "ENVARC:ClassAction")) )) (copyfiles (source "Francais/ClassAction.catalog") (dest "locale:catalogs/français")) (copyfiles (source "Francais/ClassActionPrefs.catalog") (dest "locale:catalogs/français")) (complete 100) (message #goodbye) (exit (quiet))